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THE GIMRSTOR PROGRAM 
» 


The GIMRSTOR program is desiqned to restore a GIM data base 
from a GIM ddump physical tape. Optionally it will change 
the LASTREC. 


The ddump tape can be created by two methods. First, using 
the GIM verb from the online system (see GIM MANUAL), or 
second using the ddump option of the GIMANAL program (see 
idiustration 2). 


The input file for GIMRSTOR is the DDUMP PHYSICAL tape. The 
tape reguires a DD card with a DDNAME of 'RESTORE'. The 
data base name dumped must agree with the data base name 
being retored to. The JCL is shown on page 3. 


The output files for GIMRSTOR are SYSPRINT and the data base 
being restored. The data base extents must each have their 


‘own DD cards. The first extent's DDMAME must be GIMDBO1, 


the second extent's name must be GIMDBO2, and so on. The 
only DCB . requirements for the extents are 
*DCB= (BUFNO=50,OPTCD=C)'. 


The SYSPRINT output file will print out the DDNAME and the 
DATA SFT NAME of the restore tape as. well as the data base. 
It will also print out the OLD BOOTSTRAP , the NEW BOOTSTPAP, 
and the total elapsed time. 


An option exists on the GIMRSTOR program to alter the 


.LASTREC through a parameter passec€ on the EXFC card. Its 


format is "PARM='/LASTRFC=nnn'"(nnn is the new LASTRFC). 
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z . COMPLETION CODES 


4 


The GIMRSTOR program will set a completion code so that the 
user can be sure the program ran normally. The possible 
competion CoSee are: 


0 ' PROGRAM TERMINATED DUF TO 
ABNORMAL FRRORS BY PLI FPROR 
RECOVERY SUCH AS I/O ERROR 
ON TAPF OR DISK. 


—_ 


4 PROGRAM TERMINATED NORMALLY » 
AND NO FRRORS WERE DETECTED. 


8 NEW LASTRFC SPECIFIED NOT 
POSSIBLF WITH EXISTING DATA 
BASF. 

16 BAD 'RESTORF' JCL 


RESTORE DATA SET NOT FOUND 
.DEVICFS NOT DIRECT ACCESS 
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“YARESTIR JOR JOH CARD *CCOUNTING INFORMATION 

//SJOBLIEG Approved pr Releagg 2001406423142ClIA-RDP84- ‘he ada del aie 

//7GIMRSTOR =XEC PGM=GIMRSTOR,REGION=L5QKy . 2... Lk bitin TE eheghe, neva 
4s PARM="/LASTREC=NNN# 

//GTMDBO1 OD OSN=PAYROLL.EOOL »UNI T=3330 »VCL=S ER=1234554 DIS P=S HR, 

ffi NCe= (BYENN=50,0P TCOE=C ) tinted Mime Ten ae 
J/GINDRO2 fO NS N=PAYROLL «£902, UN IT =3330,VOL=SER= 123456,DI SP= SHR, 

// Oc 8 =(PUFNO]50,0P TCD =C) : 

ff *% ait tes. ek oo ahs BE Chita Re a Spent ies Soto ue eet. | an See 
J I** D2 CARD NEEPEN FOR EACH EXTENT OF THE TATA BASE 

/ 1 ** : 

//RESTORE IM UMIT=2490,O1Sp= SHR » VOL = 2 Se R=123456, |. bemtalet les doa 

4/7 JSN=NDUMP.TAPS 

/J/SYSPRINT OP SYSOUTHA ,ICR=A{RECFEM=FBA ,LRECL=133 »,BLKSIZE=1330) 


ee age 
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